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ALL RIGHTS RESERVED. 
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FACILITY: VAX/VMS CPU-dependent Code Macro Libraries 
ABSTRACT: 


This file contains the SDL source for 11/790 machine check frame 
definitions. 


ENVIRONMENT : 


n/a 


CREATION DATE: 01-Nov-1982 
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Still more spec changes. 

v03-010 wMC0007 Wayne Cardoza 08-Jul-1984 
Assorted spec changes. 

v03-009 wMC0006 Wayne Cardoza 30-May-1983 
ee changes and corrections. 

v03-008 wMc0005 ayne Cardoza 22-F EB-1983 
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v03-007 wMC0004 Wayne Cardoza 08-Feb-1983 

Rearrange EHSR 
V03-006 wMC0003 Wayne Cardoza 20-Dec-1982 

Separate PAMM code from cache bit 
v03-005 wMc0002 Wayne Cardoge 24-Nov-1982 

Add the VMS type code definitions. 
v03-004 wMc0001 wayne Cardoza 14-Nov-1982 

Changes to MDECC, MSTATI 
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module SMCF790DEF ; 
aggregate, MCF790 structure prefix aaa | 


Longword unsigned; size in bytes of frame 
EHSR_OVERLAY union; /* error handling status register 
HSR Bite str unsigned; /* entire register 
EHSR ate oper ke te: 


OVERLAY_1 union 
"ache ~CODE byte uns igned; /* VMS puts a code here 
EHS jh struc 


ReER ots bitfield mask Length 3; /* VMS ervice type 
FIL tfield length 1 fill prefix MCF790 t g $$; 
RSRC_RER bitfield mask; /* Resource removed iron service 
SBIA bitfield mask; /* full SBIA log follows 
SBIA =fRR bitfield mask; /* SBIA error summary included 
MBOX-1D bitfield mask; /* MBOX 1D error included 
end EHSR_ BITS_1; 
end EHSR_OVERLAY_T; 
TRAP_VEC bitfield mask Length 85 8; Fe trap vector 
ILLT bitfield length 1 fill ix MCF790 tag $$; 

AUTO_SHUT bitfield mask; /* aeaee error flag 

EAR_SAV bitfield mask; /* meaningful to microcode 

ICS bitfield mask; /* ICS correction 

IDRAM bitfield mask; /* IDRAM correction 

FDRAM bitfield mask; /* FDRAM correction 

FBACS bitfield mask; /* FBACS correction 

FBMCS bitfield mask; /* FBMCS correction 

IBOX_GPR bitfield mask; /* IBOX GPR correction 

EBOX"SPBA bitfield mask; /* EBOX oA 

EBOX_SPAB bitfield mask; /* EBOX SP A to B 

FBOX-SP bitfield mask; /* FBOX SP correction 

FBOX’ bitfield mask; /* FBOX service 

VMS_ENT bitfield mask; /* VMAS entered 

EHM-ENT bitfield mask; /* EHM entered 

moo Ox bitfield mask; /* MBOX service 

end EHSR_ BITS; 
end EHSR OVERCAY: 


EVMQSAV Ton pogeere © unsigned; /* virtual address - EBOX port requests 

EBCS over A /* EBOX control status register 
ich unsigned; /* entire register 

EBCS epit pe ruc eure: 


yi struc 
FILL2 bit field “FLt prefix ncE790 tag $$; 
10_RD bitfield mask; 0 read abort 


C5 re wee 


117 MEM_WRT bitfield mask; /* memory "cite abort 

118 STA_MOD pigtietd mask; ie piate As. ed abort 

119 EB y' b tfield mask; EBOK a org 

120 FICL3 b thield Length 3 rie’ pret x ner? 0 tag $$; 

121 WBUS_CHK bit eld mask; /* WBUS to EDP error 

1 § EDP_PE birt eld mask; /* EBOX de ta path parity error 

1 USTR_PE b tfield mask; /* EBOX microstack 

124 ECS PE bitfield mask; /* EBOX control store 

125 EMCR_PE bitfield mask /* EBOX memory control RAM 

126 IBOX-ERR bitfield mask; /* IBOX hardware error 

127 MBOX_INT bitfield mask; /* MBOX interrupt request 

128 MBOX_FE bitfield mask; /* MBOX fatal error 
15-SEP-1984 g3: 9:05.49 Sot ¥¢.0 Page 
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198 end EBCS Bits 23 

130 EBCS Bits structure; 

131 FILL2A bitfield HU A erotte ae MCF790 tag $$; 

136 ABORTS bitfield ma 

13 FILL3A bitfield aod 39 mt prefix MCF790 tag $$; 

134 DIAG_ERR bitfield mask; /* diagnostic error flag 

135 end EBCS BITS_3; 

136 end EBCS_OVERLAY_T; 

137 FILL4 bitfield Length 4 fill pe MCF790 tag $$; 

138 PME pity rete mask; /* performance neasurenent enable 

139 FILLS bitfield Length 6 fill prefix MCF? 0 tag $$; 

140 ICS_EF bitfield mask; /* IBOX ond ha Ny : ore error 

141 IDRAM_EF bitfield neski /* IBOX dispatch RAM error 

166 FBMCS_EF bitfield mask; /* FBOX FBM control store error 

14 FBACS_EF bitfield mask; /* FBOX FBA control store error 

144 FDRAM_EF bitfield mask; /* FBOX dispatch RAM error 

145 end EBCS_GBITS; 

146 end EBCS OVERLAY: 

147 EDPSR OVERLAY union; /* EBOX data path status register 

148 BPS Tie str unsigned; is entire register 

149 EDP SR ait structure: 

150 ® bitfield mask; /* scratchpad to nee error 

151 S-uBUS. PE bitfield mask; | /* WBUS to AMUX erro 

152 RAM_PE bitfield mask; /* paretrined to AMUX error 

153 OPER_CHK bitfield mask; /* ope grand I ges error 

154 FILLS1 bitfield fill ref ix MCF 

155 RSLT_CHK bitfield mas /* tod 6 ote error 

156 B_OPBUS bitfield mask; /* OPBUS to BMUX error 

157 B WBUS bitfield mask aK /* WBUS to BMUX error 

158 EBP_MISC bitfield m /* misc source porta error 

159 FILC6 bitfield Length Ki fill ipretix MCF 790 

160 WREG bie tieng mas resister parity error 

161 vMQ abs bitfield mask ‘nt A. te in error 

16¢ FILC? bitfield Length 8 fill pretix mcr tag $$; 

16 X_BYTE bitfield mask Length 4; /* AMUX byte in error 

164 x aS bitfield mask length 4; /* BAuE byte in error 

165 end EDPSR_BITS; 

166 end EDPSR_O OVERLAYS 

167 CSLINT 1 OVERLAY union; /* console/interrupt register 

168 CSCINT Longuord unsigned; /* entire register 

19° CSLINT_BITS structure; 

170 CADR bitfield mask length 6; /* console bus address 

171 FORT Bit tietd mask; /* console bus write 

76 CCLK bitfield mask; /* console bus clock 

17 CDAT pitt ield mask” length 8; /* console bus eate 

174 IPR b AAS 1 mask length 4; /* interrupt priority request level 

175 INT_SRC bitfield mask; /* IPR due to in ernal sourc 

176 I0OA bitfield mesh. Tength 2; /* 1/0 adapter with highest TPR 
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CSL_TTX bitfield mask; 
CSL_TRX bigtietd mask; /* console terminal receive 
CSL_LRL b Fiieie mask; /* console RL 
INT_TMR b ¥f eld mask; /* interval Steer interrupt 
INT“MBOX b ttield mask; /* MBOX interrupt 
CPU_PF bitfield mask; /* CPU powerfail interrupt 
CSL_HP bitfield mask; /* console halt pending 

end CSLINT BITS; 

end CSLINT_OVERLAY; 
IBESR_OVERCAY union: /* IBOX error/status register 
~SEP=1984 23:09:05.49 SDL _V2.0 Page 
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IBESR spngwore unsigned; /* entire register 

IBESR_BIT struc cture 
FILL8 bitfield Cength 8 fill prefix MCF790 tag $$; 
UOP_SEL bitfield mask length 2; y OP BUS data source 
SRC_IMD bitfield mask; /* OP BUS source was IMD 
UTPR bitfield mesh ten th 3; /* processor port iia microtrap 
FILL9 bitfield Length ? fill Satis MCF790 t tag 
ICS_PE bitfield mask; /* IBOX control store * parity error 
IDRAM_PE bitfield mask; /* 
IAMUX-PE bitfield mask; /* AMUX ren GPR selected 
RLOG_PE bitfield mask; /* unwinding RLOG 5 
IBUF_PE bitfield mask /* error on b test adiags or R-mode finder 
IBMUR_PE bitfield mask; /* output of 
RSV_MODE bitfield mask; /* reserved mo be 
1weds_P PE bitfield mask; /* weUs error detected by IBOX 
IAMUX_EC bitfield mask Length 2; 


end IBESR BITS; 

end IBESR_OVERLAY; 

EBXWD1 Longword unsigned; /* 
EBXWD2 Longword unsigned: /* 
IVASAV longword unsigned; /* 
VIBASAV Longword uns gned; /* 
ESASAV Longword uns tened; /* 
ISASAV Longword uns agned: / 
CPC lLongword unsigne 
MSTAT1 NEAL AY union; /* 

MSTAT1 | rie ser unsigned: 


RSTAT! Bi Bit gtrus tu 
eRe bitfield mask; 
CSH_ERR bitfield weeks 
CSH-DAT_NBW bitfie 
WRT_DAT_PE bitfi 
TB_TAG_PE bitfield mask 
TB-A_PE bitfield mask; 
TB_B_PE bitfield mask; 
TB-VAL_PE bitfield mask; 
CSR_HIT bitfield 
AB_ADPT bitfield mask 
AB_CYCL bitfield mask; 
AB-ADR_PE bitfie 
AB-CM_PE bitfield mask 
AB-DAT_PE bitfield mask; 
CPR_PE-A bitfield meek: 
CPR_PE 5 bitfield a 
WOCRT Bitfield ma 
CYCLE_TYP bitfiel 
DEST oP bitfield 

end MSTAT1 BITS; 

end MSTAT1_OVERLAY; 


/ 
As teheth 2; 
d mask Length 4; /* MBOX 
mask Length 2; 


4 
/* console coretnat transmit 


EBOX write data 1 
EBOX write data 2 
virtual address for OP port requests 
virtual address of next IBUF port request 
PC during EBOX execution and thee raat 
PC of instruction OP ttt worki o. 9 
PC of instruction evaluated in IBUFFER 
MBOX status register 1 

/* entire register 


Bw bittield mask; a: datapath parity error on byte write 


* error detectod on array re pal to cache 
os « datapath: which cache ha 
segets 


d the error 
poctty error, non byte write 
* MDBUS parity error on write data 
2 * h.. H on address tag 
/* error on PT 
/* error on Aa F 
/* error in val y A be 
; /* cache aitye ss history 
2; /* ABUS  Sepater in error 
* ABUS cycle in error 


ld mask; /* ABUS ° ysical pddress in error 


/* ABUS cntrl/mask parity error 
/* ABUS data parity error 
/* cycte parameter RAM error (A) 
* cycle parameter RAM error (B) 
ye longword in ereee 

gyc le type 
js port being serviced 


Sa 
Fz 
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B 
ening | roy ¥ERLAY union; /* MBOX status ve seter 2 
ares & na tgned: /* entire regis 
peta BiI etsy 
ata bitfield. Tength 1 fill prefix MCE 790 tag $$ 
X_LCK bitfield mask; /* error while loc asserted 
CP iO BUF bitfield mask; /* error on CPU to 10 request 
axe bitfield mask; /* non-existent memory 
CSH_W bietietd mask; /* selected cache entry was modified 
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CSH_TAG_W bitfield mask; /* error in locke written b 
CSH-TAG-PE bitfield mask; /* error in cache t tag. 
MUL_ERR bitfield mask; /* gut sine MBOX erro 
SBIA_STAT bitfield. mask Length 6 SBIA A diagnostic status 
AB_BAD DAT bitfield mask; Abus. bad data flag received 
SBIA_CPBW bitfield mask; is SB1A error was on CP byte write 
PAMM_DATA bitfield mask Length 4; PAMM code 
PAMM CACHE bitfield mask; /* PAMM cache disable bit 
end BETA BITS; 
end MSTAT OVERLAY; 
MDECC_OVERCAY union; /* MBOX data ECC register 
woe 493: Bite struct uns igned; /* entire register 
struct 
ete DIAG bitfield mask Len th 8; /* force errors 
FILC115 bitfield Leng ill prefix MCF790 tag $$; 
SYNDRM bitfield mask "Length 6: /* error data syndrome 
PAR_INV bitfield m * indicates parece is being inverted 
FILC11 bitfield Length 3 fill prefix MCF790 $$; 
ADR_PE bitfield /* data address parity error 
DBL“BIT bitfield mmosh; /* double bit error 
SNG_ERR bitfield mask; /* single bit error 
BAD-DATA bitfield mask; /* bad data flag 
ATA_MUL bitfield mask; /* multiple errors 
end MDECC BITS; 
end MDECC OVERLAY; 
MERG OVERLAY unsigned; /* MBOX error generator register 
aa < go union; /* MBOX cache control register 
} senguers unsigned; /* entire register 
‘en et SAO ENB structure; 
bitfield mask; /* cache 0 enable 
att ~ENB bitfield mask; /* cache 1 enable 
FRC “ATS T bitfield mask; /* force cache hit 
FRC-MISS bitfield mask; /* force cache miss 
end CSHUTL_BITS; 
end CSHCTL HOVERCAY: 
MEDR Longword unsigned; /* data word used a he error 
MEAR Longword unsigned: Aa : ee" cal address in latch during error 
beans OVERLAY union; BOX error register 
BXERR BITE str Ee /* entire register 
FBXERR, ie structure; 
bitfield; /* There is an orrer - Pains of bits valid 
an RR iptield Length 1 fill A >. MCF790 t tag 8 $; 
TEST 3 tfield ma /* error durin f test 
FILL15 bitfield ee 11 runt pret MCF7 0” tag $$; 
DATA_TYP bitfield mask sengrh /* data pe during error 
FILLT4 bitfield Length 1 fill atte MCF790 tag 
FBOX_GPR bitfield mask; /* error reading scratchpad 
FBOX_SLF beer ieee peeks is error dur ng self test 
FOOK RAN bitfield m /* DRAM part ty error 
PROX f BA_CS bitfield. mask: /* error in adder control store 
FBOX-FBM-CS bitfield mask; /* error in multiplier control store 
end FBXERR_BITS; 


97 end FBXERR_OVERLAY; 
9 CSES longword unsigned; /* control 
PC lLongword unsigned; 

o PSL longword unsigned; 

02 /* MBOX cyc 
03 constant ( 

04 P, 

05 READ_REG /* 
06 WRITE_REG, /* 
07 WRITE BAK, /* 
08 ABUS_QRT, /* 
09 DATA_COR, /* 
10 CLR_CSH /* 
11 TB PROBE, /* 
ig AB0S /* 
1 CP_REFL /* 
14 INVAL_T6, /* 
15 TB_CYCLE /* 
16 CP"BYT_WRT, /* 
17 CP"WRT; /* 
18 CP_READ /* 
19 ABOS_REFL /* 
$59 ) equals 0 increment 1 prefix MCF790 ta 
$56 /* DEST CP 
$ constant ( 

324 IBF _PORT_O, /* 
$52 OP_PorT /* 
26 EBOX_PORT /* 
327 1BF_Port_$ /* 
329 ) equals 0 increment 1 prefix MCF790 ta 
$5 /* VMS mach 

$3) constant ( 

3 FBOX, /* 
3 EBOX, /* 
34 IBOX, /* 
5 MBOX_FE /* 
$ ) equals 1 increment 1 prefix MCF790 ta 
HA end MCF790; 

39 end_module SMCF790DEF; 


. 3 
store error status register 


le types 
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5.49 
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read register 
write register 
write back 

ABUS array write 
data correction 
clear cache 

TB probe 

AB 


U 
CP refill 
invalidate TB 
TB cycle 
CP byte write 
CP write 


CP read 
ABUS refill 
g $C; 


(port) codes 


IBUF port 
g $C; 


ine check service codes 


FBOX 
EBOX 
1BOX 
MBOX fatal error 
g $C; 
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